a 


Bas 


FFFFFFFFFRFFFFE 000000000 RRRRRRRRRRRR RRRRRRRRRRRR TITTTTTTTTTTTTT LLet 
FFFFFRFFRRFFFFE 000000000 RRRRRRRRRRRR RRRRRRRRRRRR TITTTTTTTTTTTFT Lie 
FFFFFRFRRRFFFFFE 000000000 RRRRRRRRRRRR RRRRRRRRRRRR TITTTTITTTTTTTT §=LtL 
FFF 000 000 RRR RRR RRR RRR TTT LLL 
FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 
FFFFFFFFFFFF 000 000 RRRRRRRRRRRR RRRRRRRRRRRR TTT LLL 
FFFFFFFFFFFE 000 000 RRRRRRRRRRRR RRRRRRRRRRRR TTT LLL 
FFFFFFFFFFFF 000 000 RRRRRRRRRRRR RRRRRRRRRRRR TTT LLL 

FFF 000 000 RRR RRR RRR = RRR TTT LLL 

FFF 000 000 RRR RRR RRR = =RRR TTT LLL 

FFF 000 RRR RRR RRR = RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 0 000 RRR RRR RRR RRR TTT LLL 

FFF 000000000 RRR RRR RRR RRR TTT LLLLLLLLLLELLLL 
FFF 000000000 RRR RRR RRR RRR TTT LLLLLLLLLLELLLL 
FFF 000000000 RRR RRR RRR RRR TTT LLLLELLLLLLLLLL 
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F 
F 
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F 
F 
F 
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F 
F 
F 
F 
F 
F 
F 
F 
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LOL LL LL LL LL LL LL LO LO LP LO LL LL LL 


| C 14 Q 
| ef ILE®* 1D©eFORMSG FO 
FFFFFFFFFF 000000 RRRRRRRR MM MM  SSSSSSS$_-- GGGGGGG6 | 
FFFFFFFFFF | 000000 RRRRRRRR MM MM SSSSSSSS_ --« GGGGGGGG | ; 
FF 00 00 RR RR MMMM MMMM SS 66 | : 
FF 00 00 RR RR MMMM MMMM SS 6G | ; 
FF 00 00 RR RR MM MM SS 6G ; 
FF 00 00 RR RR MM MM SS 6G ; 
FFFFFFFF 00 00 RRRRRRRR MM MM  SSSSSS_-—sGG | ; 
FFFFFFFF 00 00 RRRRRRRR MM MM = OSSSSSS.)s«CGG | ; 
FF 00 00 RR RR MM MM $$ GG GGGG6GG | ; 
FF 00 00 RR RR MM MM S$ GG GGGGGG ; 
FF 00 00 RR RR MM MM S$ GG 6G ; ; 
FF 00 00 RR RR MM MM $$ GG 66 Pas ; 
FF 000000 ~—saRR RR MM MM SSSSSSSS 666666 as | : 
FF 000000 ~=sa RR RR MM MM SSSSSSSS 6GGGGG Pe ; 
LL LIIIII SSSSSSSS : 
LL HII] SSSSS555 | : 
LL 1] 5S | j 
LL 1 5S | : 
LL 1] 5S | : 
LL 1] 5S : 
LL I] SSSSSS | : 
LL 1] S5555S | : 
LL 1] $$ 
LL I] SS ‘ 
LL I] SS ‘ 
LL II SS : 
LLLLLLLLLL JIIIII © SSSSSSSS : 
LLLLLLLLLL IIII111 SSSSSSSS . 


———————__-—_ CS 
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FORMSG Message definitions 15-SEP-1984 23:46:25 VAX=-11 Message Vv04-00 P 1 
bosEP-1984 $5368: 5 DISKSVMSMAST R: FORRTL.SRCJFORMSG.MSG;1 i 
-TITLE FORSMSGDEF FORS hae tS messages 
-IDENT '2=006' ! File: FORMSG.MSG Edit: SBL2006 


' 
PARES ESESESSSS ESTES SESS T ESTE TTT TTT Tee Teer e etc eee ci ccc cer icici citi ti tiiie 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
is DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
it ALL RIGHTS RESERVED 


® 

® 

® 

* 

is THIS SOFTWARE 1S FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED + 
ie ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ®* 
is INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
i COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
is OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
ie TRANSFERRED. : 
® 

{t THE INFORMATION IN THIS SOFTWARE 1S SUBJECT 10 CHANGE WITHOUT NOTICE 
iw AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
i CORPORATION. . 
® 

® 

® 

* 

® 

* 


ie DIGITAL ASSUMES NO RESPONS 
is SOFTWARE ON EQUIPMENT WHIC 


ITY FOR THE USE OR RELIABILITY OF ITS 


IBILITY 
H IS NOT SUPPLIED BY DIGITAL. 


Lee REE EAE RAE AEE 


! 1-014 = Add errors 17-19 for NAMELIST. SBL 10-Nov-1980 : 
' 1-015 = Correct typo in TOOMANVAL. SBL 15-Dec-1980 

1-016 - eeetere c og ing bracket on OPEDEFREQ, mysteriously dropped in 1-015. 

‘ -Jan- 

! 2-001 - Convert to ae 2 y Gis source format. Adapted from FORMSG.MDL 

! yereves 1-016. 1 <eee 1981 

! 2-002 - Add UNFIO_FMT, FAT Tou “DIR IO_KEY, $6910. DIR, KEYIO_DIR, 
! 10 ONONFORS INVTXTREC, UN Sune JAw 2 am Ct 1981 
i 2-903 = Change INVTXTREC to INVTEXREC. JAW Socks 
! 2-004 - Add INVTEX which does not require a recor a This is for indexed 

! and internal a8 that $9 not have a valid record number. %GP 21-Dec-9181 
' 2-005 - Add .TITLE. SBL 28-Aug-1982 

2-006 - Add OPEREGDIS and OPER asea. SBL 2-Jun-1983 


i Symbols are defined following the standard for global names: 
FOR$_abcmnoxyz 


’ ‘mn se 
! and ‘‘xyz"’ are the first three letters of the first three words of “the error 
! message, not counting articles and prepositions. 


i The names of all procedures using each error condition value should appear 


] 
' 
' 
' 
: 
In addition, the Library standards specify that the letters ‘‘abc"’ 
' 
' 
! 
; in the comments included with each error definition. 
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! MACRO-32 Programming: 


PVP Be BBS BS BS BE BB ANN NAAN PPONIPONINPNIPONY 2 2 PS OP OO OO 
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FORSMSGDEF FORS facility messages 15-SEP-1984 23:46: VAX-11 Message v04-00 Page 2 
b7gEp=|obe 1:39:58 DISKSVMSMAST R: LFORRTL.SRCIFORMSG.MSG;1 . 
of f : 
28 ! The macros call: : 
59 ! ; 
of SFORDEF : 
6¢ ! will cause all symbols to be made available to the module. : 
63 ! The STSS$SV_MSG_ID is the FORTRAN error number (1:94). ‘ 
64 ! These symbols are declared EXTERNAL by the Run-time Library, : 
o2 ! the macros are provided only for the convenience of the user. ‘ 
67 l= | Ps 
68 ; 
69 ; 
i : 
Le ! ; Make all errors be severe (except as noted) ; 
74! ; Set sub-system specific bit and make SEVERE ‘ 
ie : ; Set LH to 24 (decimal). : 
00000018 + =77 FACILITY FOR,24 /SYSTEM | : 
4 - SEVERITY FATAL : 
0018800C 80 NOTFORSPE <not a FORTRAN-specific error!/!+!+ user PC !XL> /FAO=3 : 
81 ! ; never signaled. Used only as a FORTRAN error - 
82 ! : number for ERRSNS to mean some other facility ‘ 
S ; ; than FORS or MTH$ detected the error. : 
85 ; 
86 ! ; Set sub-system specific bit and make SEVERE | : 
of : ; Set LH to 24 (decimal). : 
89 : 
si -BASE 17 : 
0018808C 92 SYNERRNAM <syntax error in NAMELIST input at or before ""!AS''!/ unit !SL file | : 
00188094 93 TOOMANVAL <too many values for NAMELIST variable “‘!AC''!/ unit !SL_ file !AS!/ : 
0018809C 94 INVREF VAR <invalid reference to variable ‘'!AS'’ in NAMELIST input!/ unit !SL | : 
001880A4 95 REWERR <REWIND error!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3 : 
001880AC 96 DUPF ILSPE <duplicate file specifications!/ unit !SL_ file !AS!/_ user PC !XL> : 
00188084 97 INPRECTOO <input record too long!/ unit !SL_ file !AS!/ user PC !XL>_/FAO=35 : 
0018808C 98 BACERR <BACKSPACE error!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3 : 
0018804 99 ENDDURREA <end-of-file during read!/ unit !SL_ file !AS!/ user PC !XL> /FAO=_ : 
Bot gece 100 RE CNUMOUT <record number outside range!/ unit !SL_ file !AS!/ user PC !XL> / | : 
00188004 101 OPEDEFREQ <OPEN or DEFINE FILE pygutree for keyed or direct access!/ unit !SL | : 
001880DC 102 TOOMANRE C <too many records in 1/0 statement!/ umit !SL_ file !AS!/ user PC ; 
001880E4 103 CLOERR <CLOSE error!/ unit !SL_ file !AS!/ user PC !XL> /FAQ= : 
QO1880EC 104 FILNOTFOU <file not found!/ unit !SL_ file !AS!/ user PC !XL> /FAQ= | : 
001880F4 105 OPEFAI <open failure!/ unit !SL_ file !AS!/ user PC !XL> /FAQ= : 
QO1880FC 106 MIXFILACC <mixed file access modes!/ unit ‘SL file !AS!/ user PC !XL> /FAO= | : 
00188104 107 INVLOGUNI <invalid logical unit number!/ unit !SL_ file !AS!/ user_PC !XL> / | : 
0018810C 108 ENDFILERR <ENDFILE error!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3 : 
Ba eaiic 109 UNIALROPE <unit already open!/ unit !SL_ file !AS!/ user PC _!XL> /FAO=3 : 
001 aiit 110 SEGRECFOR <segmented record format error!/ unit !SL_ file !AS!/ user PC !XL> | : 
00188124 111 ATTACCNON <attempt to access non-existent rgcord!/ unit !SL_ file !AS!/_ user. : 
0018812C 6 INCRECLEN <inconsistent record length!/ umit !SL_ file !AS!/ user PC !XL> /F : 
00188154 11 ERRDURWRI <error during write!/ umit !SL_ file 'AS!/ user PC !XL> /FAO= | : 


FORSMSGDEF 


FORS facility messages 


pololelolololelelololelelolelololololo) 
jelelelelelelelelelelelelelelelelalelo) 
3 SS 
00.00 09.0000 00 00 09 09 00 00 CD CD CD CD CD CD CDOD 
©0200 09 09 00 C0 CO C0 CD CD CO CO CO CU CD CD CD OD OD 
a a a a ed dd 
PHO HSOLOLOLOLOLOLOLO 


001881FA 


00188204 
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1 
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1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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1 
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1 
1 
i 


SIDS DED. DED DED DAD DE TTT BS BS BS BAIA nnn nnn 2 
SOO NAU EWR $$ O ODNAU EWN CO ODNAU EWN 0 OONOAU EWP $0 OONOUS WA) -OOONOUS 


DOOQAOMDr ownm  vmM<— BsM>yS 


FINERR 
«LITERAL 
«LITERAL 


LISIO_SYN 
INF FORLOO 


FORVARMIS 
SYNERRFOR 


- SEVERITY 
OUTCONERR 


- SEVERITY 
INPCONERR 


-BASE 


OUTSTAOVE 
INPSTAREQ 
VFEVALERR 


F 14 
TERRES FEsS035UDSAgaagts. PS 


0 Page 3 
5 DISKSVMSMASTER: CFORRTL.SRCIJFORMSG.MSG;1 . 
<error during read!/ unit !SL_ file !AS'!/ user PC !XL> /FAO=3 
<recursive 1/0 operation!/ unit !SL_ file 'AS'!/ user PC !XL> /FAO= 
<insufficient virtual memory!/ unit !SL_ file 'AS'/ user PC !XL> /| 
<no such device!/ unit !SL file !AS!/ user PC !XL> /FAO=3 
<file name specification error!/ unit !SL_ file 'AS!/ user PC !XL>) 
<inconsistent record type!/ unit !SL_ file 'AS'!/ user PC !XL> /FAO | 
<keyword value error in OPEN statement!/ unit !SL_ file 'AS'/ user 
<inconsistent OPEN/CLOSE parameters!/ unit !SL_ file 'AS'/ user PC 
<write to READONLY file!/ unit !SL_ file !AS!/ user PC !XL> /FAO= 

<invalid argument to FORTRAN Run-Time Library!/!+!+ user PC !XL> /F 
<invalid key specification!/ unit !SL_ file 'AS!/ user PC 'XL> /FA 
<inconsistent ey change or duplicate key!/ unit !SL_ file !AS!/ uu! 
<inconsistent file organization!/ unit !SL file 'AS!/ user PC !XL 


<REWRITE error!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3 
<DELETE error!/ unit !SL_ file !AS'/ user PC !XL> /FAO=3 
<UNLOCK error!/ unit !SL_ file !AS! ! 

<FIND error!/ unit '!SL file !AS'!/ user PC !XL> /FAO=3 
FORS_MORONEREC=1605852 

FORS_ATTREANON=1605924 


; Set sub-system specific bit and make SEVERE 


59 
<list-directed 1/0 syntax error!/ unit !SL_ file !AS!/ user PC !XL 
<infinite format loop!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3 
<format/variable-type mismatch!/ unit !SL_ file !AS'/ user PC !XL> 
<syntax error in format!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3 
; Set sub-system specific bit and make ERROR (not SEVERE) 

ERROR 


<output conversion error!/ unit 'SL file 'AS!/ user PC !XL> iho: 


; Set sub-system specific bit and make SEVERE 


FATAL 
<input conversion error!/ unit !SL_ file !AS!/ user PC !XL> /FAO=3_ 
; Set sub-system specific bit and make SEVERE | 


66 | 


<output statement overflows record!/ unit !SL_ file !AS!/ user PC 
<input statement requires too much data!/ unit !SL_ file !AS'/ use. 
<variable format expression value error!/ unit !SL_ file !AS'!/ use| 
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FORSMSGDEF FORS facility messages 15-SEP-1984 746: VAX-11 Message v04-00 P 4 
4 ° 5ioE b= 1387 98:25:58 DISKSVMSMASTER: FORRTL.SRCIJFORMSG.MSG; 1 ne 


! ; Set sub-system specific bit and make SEVERE 


«BASE 93 
001882EC ADJARRDIM <adjustable array dimension error> 
eeeeeraeree 


The following messages are secondary messages, or are used only in 
exit handlers, and therefore do not need to be (and should not be) 
contiguous with the messages above. 


-BASE 256 


The next six messages are secondary messages for use with MIXFILACC in 
FORS$IO_BEG and FORSSCB. 


00188804 UNF IO_FMT <unformatted 1/0 to unit open for formatted transfers> /FAO=0 
0018880C FMTIO_UNF <formatted 1/0 to unit open for unformatted transfers> /FAO=0 
00188814 DIRIO_KEY <direct-access 1/0 to unit open for keyed access> /FAO=0 

0018881C SEQIO_DIR <sequential-access 1/0 to unit open for direct access> /FAO=0 
00188824 KEYIO DIR <keyed-access 1/0 to unit open for direct access> /FA0=0 

0018882C 10_NONFOR <1/0 to non-FORTRAN unit> /FAO=0 


The next two messages are secondary messages for use with INPCONERR in 
FORSSUDF _WF and FORSSUDF _WL. 


00188834 INVTEXREC <invalid text is ‘"!AS'' in record number !UL> /FAO=2 
0018883C INVTEX <invalid text is ""!AS''> /FAQO=1 
! Additional secondary messages 
00188844 OPEREQDIS <operation requires file to be on disk or tape>/FAO=0 
0018884C¢ OPEREQSEQ <operation requires sequential file organization and access>/FA0=0 
! The next message is a pr eery message used in the exit handler which 
! is declared by FORSHANDLER. 
-BASE 300 
«SEVERITY INFORMATION 
00188963 FLOUNDE XC <'SL floating underflow exception!%S> /FAO=1 | 
! End of special messages 
! weereeneee 
«END 


COONAN WWIN OOO NAME WN $9 OD NAME WW 0 OD NOAU EWR OOONOUS Wr 


FIPIAPIIPININPININIA DN IA INIA INIA IMI IA at rt kk hd 
oO tt SH | | “QOOCOTOCOCOCOCOSCOC OOO OOOO OWO ODDO WWOWDOMOWONNNNNNNN 


: End of file FORMSG.MSG 
There were 0 errors, 0 weretogs and informational oezacges issued. 
MESSAGE /NOTEXT/LIS=L1S$:F ORMSG/OBJ=OBJ$:FORMSG MSRC$:FORMS 
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